home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / zbpc_460.zip / UTILITY.EXE / MATH.BAS < prev    next >
BASIC Source File  |  1991-06-07  |  318b  |  15 lines
  1. REM Speed test for math in various versions of ZBasic-PC
  2.  
  3.  
  4.  
  5. PRINT TIME$    :X#=4.4634723762346E-22:Y#=5.234562345432E33
  6.  
  7. FOR X=-32000 TO 32000
  8.  
  9. Z#=X#*Y#
  10.  
  11. NEXT X
  12.  
  13. PRINT TIME$,Z#
  14.  
  15.